Шаг 80 - Метод WriteLine.

Записывает в файл TextStream указанную строку и символ новой строки.

object.WriteLine([string])

Параметры
object объект типа TextStream
string необязательный. Записываемый в файл текст.

Пример
Следующий код иллюстрирует использование WriteLine метода:

Function WriteLineToFile
  Const ForReading = 1, ForWriting = 2
  Dim fso, f
  Set fso = CreateObject("Scripting.FileSystemObject")
  Set f = fso.OpenTextFile("c:\testfile.txt", ForWriting, True)
  f.WriteLine "Hello world!" 
  f.WriteLine "VBScript is fun!"
  Set f = fso.OpenTextFile("c:\testfile.txt", ForReading)
  WriteLineToFile = f.ReadAll
End Function
Hosted by uCoz